unit WSVoucherBrowse;



interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ImgList, DB, ActnList, ComCtrls, ToolWin, Grids,
  DBGrids, WSEdit, WSVoucherEdit, WSBrowse, ExtCtrls, Menus,
  DBGridEhGrouping, RzPanel, GridsEh, DBGridEh, RzTabs, RzButton, RzCommon;

type
  TWSVoucherBrowseForm = class (TWSBrowseForm)
    RzToolButton1: TRzToolButton;
    RzSpacer1: TRzSpacer;
    RzToolButton2: TRzToolButton;
    RzToolButton3: TRzToolButton;
    RzToolButton4: TRzToolButton;
    RzToolButton5: TRzToolButton;
    RzToolButton6: TRzToolButton;
    RzToolButton7: TRzToolButton;
  protected
    function CreateEditForm: TWSEditForm; override;
  end;

implementation

{$R *.dfm}

{ TWSVoucherBrowseForm }

{
***************************** TWSVoucherBrowseForm *****************************
}
function TWSVoucherBrowseForm.CreateEditForm: TWSEditForm;
begin
  Result := TWSVoucherEditForm.Create(Self);
end;

end.

